home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1986 October / 1986-10.d64 / line count_64 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  2KB  |  25 lines

  1. 10 fora=49152to49539:readb:pokea,b:c=c+b:next
  2. 20 ifc<>51719thenprint"[147]data error":stop
  3. 30 print "[147]sys 49155: to initialize":print "sys 49152: for a report"
  4. 40 data 76,13,193,32,41,192,162,14,160,0,169,255,145,251,136,208,251,230,252
  5. 50 data 202,208,246,169,50,141,8,3,169,192,141,9,3,169,255,141,129,193,141
  6. 60 data 130,193,96,169,0,133,251,169,194,133,252,96,32,41,192,165,58,201,255
  7. 70 data 240,98,205,130,193,208,7,165,57,205,129,193,240,86,160,1,185,57,0
  8. 80 data 153,129,193,136,16,247,160,0,177,251,200,49,251,201,255,208,17,165,58
  9. 90 data 145,251,136,165,57,145,251,32,160,192,32,160,192,208,47,160,0,177,251
  10. 100 data 217,57,0,208,32,200,192,2,208,244,32,160,192,208,28,32,88,193,169
  11. 110 data 99,160,193,32,30,171,166,57,165,58,32,205,189,162,128,108,0,3,32
  12. 120 data 64,193,76,82,192,76,228,167,160,2,177,251,24,105,1,145,251,208,7
  13. 130 data 200,177,251,105,0,145,251,96,169,0,141,131,193,32,41,192,160,0,177
  14. 140 data 251,200,49,251,201,255,240,65,160,1,177,251,153,129,193,136,16,248,160
  15. 150 data 4,177,251,56,237,129,193,200,177,251,237,130,193,176,33,169,1,141,131
  16. 160 data 193,160,7,177,251,72,136,16,250,160,4,104,145,251,200,192,8,208,248
  17. 170 data 160,0,104,145,251,200,192,4,208,248,32,64,193,76,187,192,173,131,193
  18. 180 data 208,167,96,32,179,192,32,41,192,169,13,32,210,255,160,0,177,251,170
  19. 190 data 200,49,251,201,255,240,25,177,251,32,78,193,169,58,32,210,255,200,177
  20. 200 data 251,170,200,177,251,32,78,193,32,64,193,208,214,76,88,193,165,251,24
  21. 210 data 105,4,133,251,165,252,105,0,133,252,96,140,131,193,32,205,189,172,131
  22. 220 data 193,96,169,228,141,8,3,169,167,141,9,3,96,13,84,79,79,32,77
  23. 230 data 65,78,89,32,69,88,69,67,85,84,73,79,78,83,32,79,70,32,76
  24. 240 data 73,78,69,32,0,0,0,0
  25.